(delete-key-deletes-forward-mode): Bind backspace

and delete in isearch-mode-map.

diff --git a/lisp/simple.el b/lisp/simple.el
index d7fab489621f468c15af734803b1131fcd31f939..6aae21a3f0c89e3a774194ec6cf2afb7db1ac19b 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4042,8 +4042,10 @@ For more details, see `delete-key-deletes-forward'."
                  ([C-delete] [C-backspace] kill-word backward-kill-word)
                  ([M-delete] [M-backspace] kill-word backward-kill-word)
                  ([C-M-delete] [C-M-backspace] kill-sexp backward-kill-sexp)
-                 (,esc-map
-                  [C-delete] [C-backspace] kill-sexp backward-kill-sexp))))
+                 (,esc-map [C-delete] [C-backspace] kill-sexp
+                           backward-kill-sexp)
+                 (,isearch-mode-map [backspace] [delete] isearch-delete-char
+                                    isearch-other-control-char))))
           (dolist (binding bindings)
             (let ((map global-map))
               (when (keymapp (car binding))